#ifndef _TIMER_CH
#define _TIMER_CH

#xcommand DEFINE TIMER <oTimer> ;
             [ INTERVAL <nInterval> ] ;
             [ ACTION <uAction> ] ;
       => ;
          <oTimer> := TTimer():New( <nInterval>, [<{uAction}>] )

#xcommand ACTIVATE TIMER <oTimer> => <oTimer>:Activate()

#xcommand DEACTIVATE TIMER <oTimer> => <oTimer>:DeActivate()

#xcommand RELEASE TIMER <oTimer> => <oTimer>:Release()

#endif
